/*
 * Copyright (C) 2013, 2016 Apple Inc. All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY APPLE INC. ``AS IS'' AND ANY
 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL APPLE INC. OR
 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
 * OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 
 */

#ifndef APICallbackFunction_h
#define APICallbackFunction_h

#include "APICast.h"
#include "include/JavaScriptCode/runtime/Error.h"
#include "JSCallbackConstructor.h"
#include "include/JavaScriptCode/runtime/JSLock.h"
#include <wtf/Vector.h>

namespace JSC {

    struct APICallbackFunction {

        template<typename T>
        static EncodedJSValue JSC_HOST_CALL call(ExecState *);

        template<typename T>
        static EncodedJSValue JSC_HOST_CALL construct(ExecState *);

    };

    template<typename T>
    EncodedJSValue JSC_HOST_CALL APICallbackFunction::call(ExecState *exec) {
        VM &vm = exec->vm();
        auto scope = DECLARE_THROW_SCOPE(vm);
        JSContextRef execRef = toRef(exec);
        JSObjectRef functionRef = toRef(exec->jsCallee());
        JSObjectRef thisObjRef = toRef(jsCast<JSObject *>(exec->thisValue().toThis(exec, NotStrictMode)));

        int argumentCount = static_cast<int>(exec->argumentCount());
        Vector<JSValueRef, 16> arguments;
        arguments.reserveInitialCapacity(argumentCount);
        for (int i = 0; i < argumentCount; i++)
            arguments.uncheckedAppend(toRef(exec, exec->uncheckedArgument(i)));

        JSValueRef exception = 0;
        JSValueRef result;
        {
            JSLock::DropAllLocks dropAllLocks(exec);
            result = jsCast<T *>(toJS(functionRef))->functionCallback()(execRef, functionRef, thisObjRef, argumentCount, arguments.data(),
                                                                        &exception);
        }
        if (exception)
            throwException(exec, scope, toJS(exec, exception));

        // result must be a valid JSValue.
        if (!result)
            return JSValue::encode(jsUndefined());

        return JSValue::encode(toJS(exec, result));
    }

    template<typename T>
    EncodedJSValue JSC_HOST_CALL APICallbackFunction::construct(ExecState *exec) {
        VM &vm = exec->vm();
        auto scope = DECLARE_THROW_SCOPE(vm);
        JSObject *constructor = exec->jsCallee();
        JSContextRef ctx = toRef(exec);
        JSObjectRef constructorRef = toRef(constructor);

        JSObjectCallAsConstructorCallback callback = jsCast<T *>(constructor)->constructCallback();
        if (callback) {
            size_t argumentCount = exec->argumentCount();
            Vector<JSValueRef, 16> arguments;
            arguments.reserveInitialCapacity(argumentCount);
            for (size_t i = 0; i < argumentCount; ++i)
                arguments.uncheckedAppend(toRef(exec, exec->uncheckedArgument(i)));

            JSValueRef exception = 0;
            JSObjectRef result;
            {
                JSLock::DropAllLocks dropAllLocks(exec);
                result = callback(ctx, constructorRef, argumentCount, arguments.data(), &exception);
            }
            if (exception) {
                throwException(exec, scope, toJS(exec, exception));
                return JSValue::encode(toJS(exec, exception));
            }
            // result must be a valid JSValue.
            if (!result)
                return throwVMTypeError(exec, scope);
            return JSValue::encode(toJS(result));
        }

        return JSValue::encode(toJS(JSObjectMake(ctx, jsCast<JSCallbackConstructor *>(constructor)->classRef(), 0)));
    }

} // namespace JSC

#endif // APICallbackFunction_h
